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Foreword 

The  Federal  Information  Processing-  Standards  Publication  Series  of  the  National 
Bureau  of  Standards  is  the  official  publication  relating  to  standards  adopted  and  promul¬ 
gated  under  the  provisions  of  Public  Law  89—306,  and  Part  6  of  Title  15  Code  of  Federal 
Regulations.  The  entire  series  constitutes  the  FEDERAL  INFORMATION  PROCESS¬ 
ING  STANDARDS  REGISTER. 

The  series  is  used  to  announce  Federal  Information  Processing  Standards,  and  to 
provide  standards  information  of  general  interest  and  an  index  of  relevant  standards 
publications  and  specifications.  Publications  that  announce  adoption  of  standards  provide 
the  necessary  policy,  administrative,  and  guidance  information  for  effective  standards 
implementation  and  use.  The  technical  specifications  of  the  standard  are  usually  attached 
to  the  publication,  otherwise  a  reference  source  is  cited. 

Comments  covering  Fedei'al  Information  Processing  Standards  and  Publications  are 
welcomed,  and  should  be  addressed  to  the  Associate  Director  for  ADP  Standards,  Insti¬ 
tute  for  Computer  Sciences  and  Technology,  National  Bureau  of  Standards,  Washington, 
D.C.  20234.  Such  comments  will  be  either  considered  by  NBS  or  forwarded  to  the  respon¬ 
sible  activity  as  appropriate. 


Ernest  Ambler,  Acting  Director 


Abstract 

This  FIPS  PUB  announces  the  adoption  of  the  American  National  Standard  COBOL 
(X3. 23-1974)  as  the  Fedez-al  Standard  COBOL.  This  revision  supersedes  FIPS  PUB 
21  and  reflects  major  changes  and  improvements  to  the  COBOL  specifications.  The 
American  National  Standard  defines  the  elements  of  the  COBOL  Programming  Language 
and  the  rules  for  their  use.  The  standard  is  used  by  implementors  as  the  reference 
authority  in  developing  compilers  and  by  users  for  writing  programs  in  COBOL.  The 
primary  purpose  of  the  standard  is  to  promote  a  high  degree  of  interchangeability  of 
programs  for  use  on  a  variety  of  automatic  data  processing  systems.  The  COBOL  lan¬ 
guage  is  intended  for  use  in  computer  applications  that  emphasize  the  manipulation  of 
characters,  records,  and  files. 

Key  words:  COBOL;  data  processing;  Federal  Information  Processing  Standard;  infor¬ 
mation  interchange;  information  processing;  programming  language;  software;  stand¬ 
ards  conformance. 
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Federal  Information  Processing  Standards  Publications  are  issued  by  the  National  Bui'eau  of  Standards  pursuant 
to  the  Federal  Property  and  Administrative  Services  Act  of  1949  as  amended,  Public  Law  89-306  (79  Stat.  1127),  as 
implemented  by  Executive  Order  11717  (38  FR  12315,  dated  May  11,  1973),  and  Paid:  6  of  Title  15  CFR  (Code  of 
Federal  Regulations). 


1.  Name  of  Standard.  COBOL  (FIPS  PUB  21- 

1). 

2.  Category  of  Standard.  Software  Standard, 
Programming  Language. 

3.  Explanation.  This  publication  announces  the 
adoption  of  American  National  Standard 
COBOL,  X3. 23-1974,  as  amplified  herein  as  a 
Federal  Standard.  This  revision  supersedes 
FIPS  PUB  21  and  reflects  major  changes  and 
improvements  to  the  COBOL  specifications.  The 
American  National  Standard  defines  the  ele¬ 
ments  of  the  COBOL  Programming  Language 
and  the  rules  for  their  use.  The  standard  is 
used  by  implementors  as  the  reference  author¬ 
ity  in  developing  compilers  and  by  users  for 
writing  programs  in  COBOL.  The  primary 
purpose  of  the  standard  is  to  promote  a  high 
degree  of  interchangeability  of  programs  for 
use  on  a  wide  variety  of  information  processing 
systems.  Other  languages,  appropriate  for  ap¬ 
plications  that  are  not  adequately  serviced  by 
COBOL,  are  being  considered  for  adoption  as 
Federal  Standards. 

4.  Approving  Authority.  Secretary  of  Com¬ 
merce. 

5.  Maintenance  Agency.  Department  of  Com¬ 
merce,  National  Bureau  of  Standards  (Insti¬ 
tute  for  Computer  Sciences  and  Technology). 

6.  Cross  Index.  American  National  Standard 
X3. 23-1974,  COBOL. 


7.  Related  Documents. 

a.  Federal  Information  Processing  Standards 
Publication  29,  Interpretation  Procedures  for 
Federal  Standard  COBOL. 

b.  Federal  Property  Management  Regulation 
101-32.1305-1,  Implementation  of  Federal  In¬ 
formation  Processing  Standards  Publications 
(FIPS  PUB)  into  Solicitation  Documents,  Soft¬ 
ware  Standards. 

c.  Federal  Information  Processing  Standards 
Publication  43,  Aids  for  COBOL  Program  Con¬ 
version  (FIPS  PUB  21  to  FIPS  PUB  21-1). 

8.  Objectives.  The  basic  objectives  in  applying 
Federal  Standard  COBOL  are:  (1)  to  achieve 
the  long-recognized  advantages  that  are  in¬ 
herent  in  the  use  of  higher  level  languages,  and 
(2)  to  maximize  and  protect  program  invest¬ 
ments  by  making  it  easier  and  less  expensive  to 
exchange  programs  among  different  computer 
systems,  including  replacement  systems. 

The  attainment  of  these  objectives,  from  a 
government-wide  point  of  view,  depends  upon 
the  widespread  use  of  Federal  Standard  COBOL. 
Thus,  the  general  intent  of  this  publication  is 
to  provide  a  standard  language  that  can  be 
used  in  programming  information  processing 
applications  except  in  circumstances,  discussed 
below,  where  such  use  would  not  be  advantage¬ 
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9.  Applicability.  Federal  Standard  COBOL  will 
be  used  in  programming  computer  applications 
and  programs  that  emphasize  the  manipulation 
of  characters,  records,  files  and  input/output 
(as  contrasted  with  those  concerned  primarily 
with  computational  problem  solving)  which  are 
developed  or  acquired  for  government  use. 
Specifically,  the  standard  will  be  used  for  such 
applications  whenever: 

— the  application  is  being  designed  and  pro¬ 
grammed  centrally  for  a  decentralized  sys¬ 
tem  that  employs  computers  of  different 
makes,  models  and  configurations 

— the  program  will  or  might  possibly  be  run 
on  equipment  other  than  that  for  which  the 
program  is  initially  written 

— it  is  anticipated  that  the  life  of  the  pro¬ 
gram  will  be  longer  than  the  life  of  the 
presently  installed  equipment 

— the  application  or  program  is  under  con¬ 
stant  review  for  updating  of  the  specifica¬ 
tions,  and  changes  may  result  frequently 

— the  advantages  of  the  use  of  this  higher 
level  language  can  accrue  locally  irrespec¬ 
tive  of  interchange  potential  (e.g.,  ease  of 
coding,  ease  of  documentation,  improved 
understanding,  and  ease  of  debugging). 

Exceptions  to  the  use  of  Federal  Standard 
COBOL  may  be  made  when: 

a.  A  comparative  analysis  shows  that  the  ad¬ 
vantages  inherent  in  the  use  of  Federal  Stand¬ 
ard  COBOL  are  clearly  offset  by  even  greater 
advantages  obtainable  through  use  of  an  altern¬ 
ative  language.  The  language  selection  should 
be  made  in  consideration  of  the  government’s 
overall  objectives.  Such  exceptions  to  the  use 
of  Federal  Standard  COBOL  shall  be  subject 
to  a  waiver  procedure  approved  by  the  head  of 
the  agency.  The  special  circumstances  identi¬ 
fied  in  paragraphs  b  through  e  below  are  ex¬ 
empted  from  the  requirement  for  a  waiver  at 
the  discretion  of  the  head  of  an  agency.  See 
paragraph  12,  Waivers. 

b.  The  program  requirements  are  more  eco¬ 
nomically  and  efficiently  satisfied  through  the 


use  of  report  generation,  data  base  manage¬ 
ment,  or  text  processing  languages. 

c.  The  program  is  to  be  processed  on  systems 
for  which  COBOL  compilers  are  normally  not 
developed.  If,  however,  a  COBOL  compiler  is 
available  on  a  system  other  than  the  target 
system  and  the  compiler  generates  object  code 
for  the  target  system  (cross-compiler),  COBOL 
should  be  used  to  the  extent  practicable.  This 
exception  alone  is  not  to  be  construed  as  allow¬ 
ing  exemption  to  the  requirement  for  the  use 
of  COBOL  on  small  computer  systems,  such  as 
mini-computers,  where  they  are  being  used  for 
applications  covered  above. 

d.  The  program  is  to  be  processed  on  systems 
that  are  in  the  Federal  inventory  and  for  which 
a  standard  COBOL  compiler  is  not  available. 

e.  The  computer  installation  is  oriented  to¬ 
ward  the  use  of  scientific  and  engineering  ap¬ 
plications  in  which  case  incidental  information 
processing  applications  may  be  programmed  in 
locally  used  languages. 

Federal  agencies  should  give  special  attention 
to  ensuring  that  programs  for  applications  that 
will  or  are  likely  to  be  used  by  organizations 
outside  the  Federal  Government  (i.e.,  State  and 
local  governments  and  others)  are  written  and 
made  available  in  Federal  Standard  COBOL,  in 
order  to  provide  maximum  interchangeability 
in  their  use. 

10.  Specifications.  Federal  Standard  COBOL 
specifications  are  the  language  specifications 
contained  in  American  National  Standard 
COBOL,  X3. 23-1974.  For  purposes  of  Federal 
Standard  COBOL,  the  modules  defined  in  X3.23- 
1974  are  combined  into  four  levels.  The  four 
levels  of  Federal  Standard  COBOL  are  identi¬ 
fied  as :  Low,  Low-Intermediate,  High-Inter¬ 
mediate,  and  High.  Each  Federal  Standard 
COBOL  level  is  composed  of  either  the  high  or 
low  levels  of  the  nucleus  and  ten  of  the  eleven 
Functional  Processing  Modules  (FPM’s)  de¬ 
fined  in  X3. 23-1974.  The  four  Federal  Standard 
COBOL  levels  are  reflected  in  the  following 
table.  The  numbers  in  the  table  refer  to  the 
level  within  the  FPM  or  nucleus  as  designated 
in  X3. 23-1974,  and  a  dash  in  the  table  denotes 
the  corresponding  FPM  is  omitted. 
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Low 

Level 

Low 

Intermediate 

Level 

High 

Intermediate 

Level 

High 

Level 

Nucleus 

1 

1 

2 

2 

FPM’s 

Table  Handling 

1 

1 

2 

2 

Sequential  1-0 

1 

1 

2 

2 

Relative  1-0 

— 

1 

2 

2 

Indexed  1-0 

— 

— 

— 

2 

Sort-Merge 

— 

— 

1 

2 

Report  Writer 

— ■ 

— 

— 

— 

Segmentation 

— 

1 

1 

2 

Library 

— 

1 

1 

2 

Debug 

— 

1 

2 

2 

Inter-Program  Communication 

— 

1 

2 

2 

Communication 

— 

— 

2 

2 

NOTE:  The  “REPORT  WRITER”  module  is  not  mandatory  in  any  Federal  level.  However,  the  specifications 
contained  in  X3. 23-1974  should  be  used  to  the  extent  practical,  consistent  with  the  requirements. 


11.  Implementation.  Implementation  of  the 
Federal  Standard  COBOL  is  divided  into  five 
areas  of  consideration:  acquisition  of  COBOL 
compilers,  transition  to  FIPS  PUB  21-1,  con¬ 
formance  to  Federal  Standard  COBOL,  interpre¬ 
tation  of  Federal  Standard  COBOL,  and  use  of 
COBOL  in  application  programs. 

11.1  Acquisition  of  COBOL  Compilers.  The 

provisions  reflected  in  this  publication  are  effec¬ 
tive  upon  the  date  of  this  document.  All  COBOL 
compilers  specified  for  procurement  on  or  after 
the  effective  date  must  be  identified  as  imple¬ 
menting  one  of  the  levels  of  Federal  Standard 
COBOL.  The  requirements  set  forth  in  this 
paragraph  are  applicable  to  compilers  developed 
in-house,  compilers  acquired  as  part  of  an  ADP 
system  procurement,  compilers  acquired  by 
separate  procurement  and  compilers  used  under 
an  ADP  leasing  arrangement. 

11.2  Transition  to  FIPS  PUB  21-1.  The 

adoption  of  American  National  Standard 
COBOL,  X3. 23-1974,  as  a  revised  Federal 
Standard  requires  that  provisions  be  made  for 
the  orderly  transition  to  the  revised  standard. 
The  transition  period  will  begin  on  the  date  of 
this  publication  and  will  continue  for  eighteen 
months  thereafter.  The  policies  for  the  acquisi¬ 
tion  of  COBOL  compilers  during  the  transition 
period  are: 

a.  The  provisions  of  FIPS  PUB  21  will 
apply  to  orders  placed  before  the  date  of  this 
publication  for  compilers  which  are  to  be  de¬ 
livered  subsequent  to  the  date  of  this  publica¬ 
tion. 


b.  The  provisions  of  FIPS  PUB  21-1  will 
apply  to  orders  placed  after  the  date  of  this 
publication ;  however,  a  compiler  conforming  to 
FIPS  PUB  21  may  be  acquired  for  interim  use 
until  the  compiler  conforming  to  the  revised 
standard  is  available.  Delivery  of  the  compiler 
conforming  to  the  revised  standard  may  be  de¬ 
ferred  to,  but  not  to  exceed,  the  close  of  the 
transition  period  (18  months  from  the  date  of 
this  publication) . 

11.3  Conformance  to  Federal  Standard 
COBOL.  A  compiler  implemented  in  conform¬ 
ance  to  Federal  Standard  COBOL  must  satisfy 
at  least  the  following  requirements: 

a.  The  implementation  must  include  all 
of  the  language  elements  of  at  least  one  of  the 
levels  of  Federal  Standard  COBOL. 

b.  The  implementation  must  satisfy  all 
of  the  requirements,  defined  in  American  Na¬ 
tional  Standard  COBOL,  X3. 23-1974,  section 
I,  paragraph  1.5,  Definition  of  an  Implementa¬ 
tion  of  American  National  Standard  COBOL. 
Any  requirement  stated  herein  that  may  differ 
from  the  requirements  for  an  implementation 
of  American  National  Standard  COBOL  takes 
precedence  over  the  requirements  stated  in 
X3. 23-1974. 

c.  The  implementation  must  provide  a 
facility  for  the  user  to  optionally  specify  a  level 
of  Federal  Standard  COBOL  for  monitoring  his 
source  program  at  compile  time.  The  monitor¬ 
ing  may  be  specified  for  any  level  of  Federal 
Standard  COBOL  at  or  below  the  highest  level 
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for  which  the  compiler  is  implemented.  The 
monitoring  will  be  an  analysis  of  the  syntax 
used  in  a  source  program  against  the  syntax 
included  in  the  specified  level  of  Federal  Stand¬ 
ard  COBOL.  Any  syntax  used  in  the  source 
program  that  does  not  conform  to  that  allowed 
by  the  user  selected  level  of  Federal  Standard 
COBOL  will  be  diagnosed.  The  syntax  diagnosed 
as  not  conforming  to  the  specified  level  will  be 
identified  to  the  user  through  a  diagnostic  mes¬ 
sage  on  the  source  program  listing.  The  diag¬ 
nostic  message  will  contain  at  least:  (1)  the 
identification  of  the  source  program  line  num¬ 
ber  in  which  the  non-conforming  syntax  occurs, 
and  (2)  the  identification  of  the  level  of  Fed¬ 
eral  Standard  COBOL  that  supports  the  syntax 
or  that  the  syntax  is  non-standard  COBOL. 

In  order  to  confirm  that  an  implementation 
satisfies  the  requirements  of  a  designated  level 
of  Federal  Standard  COBOL,  programs  (which 
include  the  Report  Writer  module)  have  been 
developed  for  testing  COBOL  compilers.  A  Fed¬ 
eral  COBOL  Compiler  Testing  Service  (FCCTS) 
also  is  available  to  provide  testing  services. 
Policies  concerning  required  testing  of  COBOL 
compilers  are  currently  being  developed  and  will 
be  published  in  the  near  future  by  the  General 
Services  Administration  as  an  appropriate  mod¬ 
ification  to  FPMR  101-32.1305.  For  further  in¬ 
formation  regarding  COBOL  Compiler  Testing 
Services  contact: 

Director,  Federal  COBOL  Compiler 
Testing  Service 

Department  of  the  Navy 

ADPE  Selection  Office 

Washington,  DX.  20376 

11.4  Interpretation  of  Federal  Standard 
COBOL.  During  the  use  of  Federal  Standard 
COBOL,  whether  implementing  compilers,  test¬ 
ing  compilers  or  writing  source  programs,  ques¬ 
tions  may  arise  from  time  to  time  as  to  the 
meaning  of  specific  language  specifications.  It 
is  desirable  when  this  happens  to  apply  a  solu¬ 
tion  to  these  questions  that  can  be  used  uni¬ 
formly  throughout  the  Federal  Government  and 
by  all  implementors  of  Federal  Standard  COBOL 
and  the  Report  Writer  module.  To  achieve  this 
objective,  a  Federal  COBOL  Interpretations 
Committee  has  been  organized.  Procedures  for 
processing  interpretation  of  Federal  Standard 


COBOL  are  provided  in  FIPS  PUB  29  (para¬ 
graph  7a).  For  further  information  contact: 

Chairman,  Federal  COBOL  Interpreta¬ 
tions  Committee 
Computer  Science  Section 
Systems  and  Software  Division 
Institute  for  Computer  Sciences  and 
Technology 

National  Bureau  of  Standards 
Washington,  D.C.  20234 

11.5  Use  of  COBOL.  Federal  Standard 
COBOL  will  be  used  as  defined  in  paragraph 
9,  Applicability,  as  soon  as  compilers  that  con¬ 
form  to  the  standard  are  available  and  acquired. 
It  is  not  intended  that  existing  programs  be  re¬ 
written  solely  for  the  purpose  of  conforming  to 
the  standard. 

Programs  should,  to  the  extent  practicable,  be 
limited  to  the  elements  of  one  of  the  specified 
levels  of  Federal  Standard  COBOL.  It  should 
be  recognized  that  the  use  of  any  non-standard 
language  elements  may  compromise  interchan¬ 
geability  of  programs  between  various  systems 
or  may  complicate  future  conversion  to  a  re¬ 
placement  system.  Extensions  should,  there¬ 
fore,  be  employed  only  when  their  use  will  re¬ 
sult  in  efficiencies  that  clearly  outweigh  the 
difficulties  they  may  cause.  To  the  extent  that 
specifications  for  the  required  extensions  have 
already  been  included  in  the  CODASYL  COBOL 
Journal  of  Development,  use  of  these  specifica¬ 
tions  should  minimize  future  conversion  diffi¬ 
culties. 

12.  Waivers. 

12.1  Policy.  Heads  of  agencies  are  per¬ 
mitted  to  waive  the  requirements  stated  in 
this  publication  in  the  following  circumstances. 
Each  waiver  will  cover  only  the  specific  require¬ 
ments  of  this  publication  related  to  the  need 
for  a  waiver. 

a.  A  waiver  may  be  granted  for  an  ex¬ 
ception  to  any  of  the  requirements  stated  in 
this  publication  provided  it  can  be  clearly  dem¬ 
onstrated  that  there  are  appreciable  and  con¬ 
tinuing  performance  or  cost  advantages  to  be 
gained  or  that  the  extenuating  circumstances 
are  such  that  the  overall  interests  of  the  Fed¬ 
eral  Government  are  served  by  granting  the 
requested  waiver. 
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b.  Special  capabilities  may  be  required 
to  accommodate  the  needs  of  a  particular  ap¬ 
plication  that  cannot  be  achieved  through  the 
use  of  Federal  Standard  COBOL.  A  waiver  must 
be  obtained  before  these  special  capabilities  are 
specified  for  implementation  or  acquisition.  Re¬ 
quests  for  waiver  must  clearly  demonstrate  an 
appreciable  and  continuing  performance  or  cost 
advantage  will  be  obtained  through  the  use  of 
these  special  capabilities. 

12.2  Reporting.  Waivers  granted  in  the  ac¬ 
quisition  of  compilers  will  be  reported  to  the 
National  Bureau  of  Standards,  with  the  follow¬ 
ing  supporting  documentation,  within  seven 
working  days  after  approval  by  the  head  of  the 
agency. 

a.  Relevant  documentation  considered 
by  the  head  of  the  agency  in  authorizing  the 
waiver. 

b.  Detailed  technical  specifications  of  the 
language  deviations  granted.  In  the  case  of 
deletions,  exact  reference  to  the  items  in  X3.23- 
1974  is  all  that  is  required.  In  case  of  additions 
that  are  already  developed  and  approved  by 
CODASYL,  exact  reference  to  the  items  in  the 
CODASYL  COBOL  Journal  of  Development  is 
all  that  is  required. 

c.  A  recommendation  for  action  by  NBS 
concerning  future  development  of  COBOL,  rela¬ 
tive  to  the  waiver,  should  be  included,  as  ap¬ 
propriate.  Correspondence  should  be  addressed 
to  the  Associate  Director  for  ADP  Standards, 
Institute  for  Computer  Sciences  and  Technol¬ 
ogy,  National  Bureau  of  Standards,  Washing¬ 
ton,  D.C.  20234. 

13.  Special  Information. 

a.  Development  and  maintenance  of  the 
COBOL  language  are  the  responsibilities  of  the 
Programming  Languages  Committee  of  the 
Conference  on  Data  Systems  Languages 
(CODASYL),  a  voluntary  organization  com¬ 
prised  of  interested  organizations.  Standardiza¬ 
tion  of  COBOL  in  the  United  States  is  in  the 
purview  of  the  American  National  Standards 
Institute  (ANSI),  X3J4  Committee.  The  tech¬ 
nical  specifications  of  American  National  Stand¬ 
ard  COBOL,  herein  adopted  as  a  Federal  Stand¬ 
ard,  are  based  on  the  specifications  contained 
in  CODASYL  COBOL  Journal  of  Development, 


1973,  and  changes  that  were  made  to  the  JOD 
in  response  to  X3J4  requests.  The  COBOL 
language  is  under  continual  review  by  the 
CODASYL  organization  for  modification  and 
extension.  These  changes  are  then  reviewed  by 
ANSI  for  incorporation  in  revised  editions  of 
ANS  COBOL. 

b.  In  the  event  that  there  is  no  prospect  for 
the  development  of  a  COBOL  compiler  con¬ 
forming  to  this  standard  for  the  machine  used, 
serious  consideration  should  be  given  to  using 
the  existing  COBOL  compiler,  if  available,  for 
new  or  revised  applications  to  ease  the  eventual 
conversion  to  a  new  system  employing  a  stand¬ 
ard  COBOL  compiler. 

14.  Where  To  Obtain  Copies  of  COBOL  Publi¬ 
cations. 

a.  Federal  Government  activities  should  ob¬ 
tain  copies  of  this  publication  from  established 
sources  within  each  agency.  When  there  is  no 
established  source,  purchase  orders  should  be 
submitted  to  the  National  Bureau  of  Standards, 
Institute  for  Computer  Sciences  and  Technolo¬ 
gy,  Office  of  ADP  Standards  Management,  Tech¬ 
nology  Building,  Washington,  D.C.  20234.  Refer 
to  Federal  Information  Processing  Standard 
Publication  21-1  (FIPS  PUB  21-1).  Copies  of 
the  American  National  Standard  COBOL, 
X3. 23-1974,  accompany  each  copy  of  FIPS  PUB 
21-1. 

b.  Others  may  obtain  copies  of  the  FIPS  PUB 
from  the  Superintendent  of  Documents,  U.S. 
Government  Printing  Office,  Washington,  D.C. 
20402  (SD  Catalog  Number  C13.52 :21-1) . 
There  is  a  25  percent  discount  on  quantities  of 
100  or  more.  When  ordering,  specify  document 
number,  title,  and  SD  Catalog  Number.  Pay¬ 
ment  may  be  made  by  check,  money  order, 
coupons,  or  deposit  account.  Copies  of  the 
ANSI  standard  may  be  obtained  from  the 
American  National  Standards  Institute,  Inc., 
1430  Broadway,  New  York,  New  York  10018. 
Refer  to  American  National  Standard  X3.23- 

1974,  Standard  Programming  Language 
COBOL. 

c.  Copies  of  the  CODASYL  COBOL  Journal 
of  Development  may  be  obtained  from  the 
Technical  Services  Branch,  Department  of 
Supply  and  Services,  5th  Floor,  88  Metcalfe 
Street,  Ottawa,  Ontario,  Canada  K1A  OS5. 
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DEPARTMENT  OF  COMMERCE 

National  Bureau  of  Standards 

FEDERAL  STANDARD  COBOL 
(F8PS  PUB  21  AND  21-1) 

Approved  Interpretation 
Under  the  provisions  of  Pub.  L.  80-306 
and  Executive  Order  11717,  the  Secretary 
of  Commerce  Is  authorized  to  establish 
uniform  Federal  ADP  Standards.  FIPS 
PUB  21-1  specifies  Federal  Standard 
COBOL.  The  Standard  defines  the  ele¬ 
ments  of  the  COBOL  Programming  Lan¬ 
guage  and  the  rules  for  their  use.  During 
the  use  of  the  standard,  questions  arise 
as  to  the  meaning  of  certain  language 
specifications.  FIPS  PUB  29  defines  the 
procedures  to  be  followed  In  providing 
solutions  to  these  questions.  The  proce¬ 
dures  allow  for  the  solutions  to  be  used 
uniformly  throughout  the  Federal  Gov¬ 
ernment  and  by  all  implementors  of  com¬ 
pilers  acquired  by  the  Federal  Govern¬ 
ment.  Accordingly,  in  the  January  15. 
1976  issue  of  the  Federal  Register  (FR 
Doc.  76-1184,  page  2270),  the  National 
Bureau  of  Standards  published  a  notice 
of  proposed  interpretation  of  Federal 
Standard  COBOL  as  pertains  to  the 
evaluation  of  arithmetic  expressions  in 
the  COMPUTE  statements.  All  comments 
submitted  about  the  proposed  interpreta¬ 
tion  have  been  duly  considered. 

The  following  approved  interpretation 
contains  a  definition  of  the  problem,  dis¬ 
cussion  of  the  issues,  approved  language 
interpretation,  necessary  clarifications  to 
Federal  Standar<tCOBOL,  and  the  effec¬ 
tive  date  of  the  interpretation.  The  ap¬ 
proved  interpretation,  as  of  the  effective 
date,  becomes  an  integral.part  of  Federal 
Standard  COBOL  and,  as  such,  is  con¬ 
sidered  to  be  included  whenever  refer¬ 
ence  is  made  to  Federal  Standard 
COBOL. 

Interested  parties  may,  in  accordance 
with  FIPS  PUB  29 — Interpretation  Pro¬ 
cedures  for  Federal  Standard  COBOL, 
dated  June  30,  1974,  submit  comments 
concerning  interpretations  of  Federal 
Standard  COBOL  to  the  Chairman,  Fed¬ 
eral  COBOL  Interpretations  Committee, 
e/o  Associate  Director  for  ADP  Stand¬ 
ards,  Institute  for  Computer  Sciences 
and  Technology,  National  Bureau  of 
Standards,  Washington,  D.C.  20234. 

Dated :  September  3,  1976. 

Ernest  Ambler, 

Acting  Director. 


Federal  Standard  COBOL  Interpretation 

No.  1 — The  COMPUTE  Statement 

Problem.  There  Is  no  standard  interpreta¬ 
tion  of  the  accuracy  of  the  arithmetic  op¬ 
erations  and  the  timing  and  scope  of  the 
ROUNDED  phrase  among  implementations 
of  the  COMPUTE  statement.  Both  of  these 
problems  involve  Intermediate  results.  This 
situation  not  only  adversely  Impacts  the 
portability  of  COBOL  programs,  but  also 
creates  a  major  problem  in  the  development 
of  test  programs  In  this  area. 

Issue.  The  variations  In  the  implementa¬ 
tion  of  the  COMPUTE  statement  are  due  in 
part  to  the  lack  of  specifications  which  ad¬ 
dress  the  following  issues  in  the  Federal 
COBOL  Standard: 

a.  The  number  of  decimal  digits  to  be 
provided  for  intermediate  result  fields. 

b.  The  behavior  of  the  decimal  point,  if 
specified,  in  an  Intermediate  result  field. 

c.  The  scope  of  applicability  ef  the 
ROUNDED  phrase  In  the  COMPUTE  state¬ 
ment. 

d.  Whether  rounding  or  tifimcation  will  be 
applied  to  an  Intermediate  result  field. 

Interpretation.  This  interpretation  applies 
to  both  American  National  Standard  COBOL 
X3  23-1968  and  X3. 23-1974  as  they  have  been 
adopted  as  Federal  Standard  COBOL,  FIPS 
PUBS  21  and  21-1,  respectively.  The  inter¬ 
pretation  is  In  four  parts.  Each  part  ad¬ 
dresses  one  of  the  four  Issues  related  above. 

a.  The  size  of  the  intermediate  result  field 
is  Implementor-defined. 

b.  Decimal  point  alignment  Is  required 
throughout  the  evaluation  of  the  arithmetic 
expression. 

c.  The  ROUNDED  phrase  in  the  COMPUTE 
statement  applies  only  to  the  assignment  of 
the  Intermediate  result  field  to  the  identifier 
to  the  left  of  the  equal  sign.  If  the  ROUNDED 
phrase  is  not  specified,  truncation.  If  re¬ 
quired,  will  apply  to  the  assignment  of  the 
Intermediate  result  field  to  the  identifier 
to  the  left  of  the  equal  sign. 

d.  The  implementor  will  define  whether 
truncation  or  rounding  will  occur  on  the 
intermediate  result  when  it  exceeds  the  size 
of  the  Intermediate  results  field. 

Discussion.  The  following  discusses  the 
rationale  supporting  each  of  the  four  points 
In  the  interpretation. 

a.  ANS  X3.23-1968  (page  2-71,  paragraph 
8. 1.3(6) )  and  ANS  X3.23-1974  (page  LUO, 
paragraph  5. 1.3(6))  specify  that  “each  im¬ 
plementor  will  Indicate  the  technique  used 
to  handling  arithmetic  expressions’’.  This 
specification  is  interpreted  to  mean  the  tech¬ 
niques  defined  by  the  implementor  Include 
determination  of  the  size  of  the  intermediate 
result  field. 

b.  AN8  X3.23-1968  (page  2-78,  paragraph 
6.4.4(1) )  and  ANS  X3.23-1974  (page  11-61, 
paragraph  6.3.4(1))  specify  that  “*  *.  *  dec¬ 
imal  point  alignment  Is  supplied  throughout 
toa  calculation”.  Decimal  point  alignment  is 
therefore  required  throughout  the  develop¬ 
ment  of  the  final  result  In  the  Intermediate 
result  field  dependent  enly  on  the  operands 
involved  In  an  arithmetic  expression. 

e.  ANS  X3. 23— 1968  (page  2—76,  paragraph 
3-4.1 )  and  ANS  X3.23-1974  (page  11-50,  para¬ 
graph  6.3.1)  specify  that  when  rounding  is 
requested  (the  presence  of  the  ROUNDED 
phrase),  the  absolute  value  of  the  resultant- 
tdentlfler  Is  Increased.  Truncation  will  take 
place,  as  necessary,  when  the  ROUNDED 
phrase  Is  not  specified.  The  standard  does 
not  specify  or  imply  that  the  presence  or 
absence  of  the  ROUNDED  phrase  in  the 
COMPUTE  statement  has  any  effect  on  the 
intermediate  result  field  prior  to  the  assign¬ 
ment  of  that  field  to  the  resultant-identifier. 

d.  The  techniques  defined  by  the  Imple¬ 
mentor  to  be  used  in  the  handling  of  arith¬ 
metic  expressions  is  interpreted  to  Include 
toe  application  of  rounding  or  truncation  to 
to®  intermediate  result  field. 

Clarification  to  the  Federal  COBOL  Stand¬ 
ard.  None. 

Effective  Date  of  the  Interpretation.  This 
Interpretation  Is  effective  on  or  before  Oc¬ 
tober  14,  1*76. 

[FR  Doc.76-26812  Piled  9-13-76:8:46  am) 


